
		**********************************************************
		** File: UNODC EBA 6-30.do								**
		** Paper: Human Trafficking Indicators: A New Dataset	**
		** Author: Richard Frank								**
		** Date: July 11, 2021									**
		** Task: Running 2nd series of UNODC EBA models			**
 		**********************************************************
		
				clear
				version 16.1
				set max_memory 32g, permanently
				set seed 1234
				set level 95 		
				 cd "C:\Users\Administrator\Desktop\"
				use "HT EBA merged DV and IVs 2006.dta"
	
 ***************
 ** 6. cpiave **
 ***************
		
		oprobit dest_UNODC /**/ cpiave /**/
		regsave using /**/ eba_unodc_6 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 /**/  easia_pacific energyuseave ethnic_tensionave ethnicave 		///
		 europe execleftave execrightave fdiave foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ cpiave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_6 /**/, tstat pval ci autoid append detail(all) 	
						}	
						
 ***************
 ** 7. easia_pacific **
 ***************
		
		oprobit dest_UNODC /**/ easia_pacific /**/
		regsave using /**/ eba_unodc_7 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave /**/  energyuseave ethnic_tensionave ethnicave 				///
		 europe execleftave execrightave fdiave foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ easia_pacific /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_7 /**/, tstat pval ci autoid append detail(all) 	
						}	
	
								
 ***************
 ** 8. energyuseave **
 ***************
		
		oprobit dest_UNODC /**/ energyuseave /**/
		regsave using /**/ eba_unodc_8 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific /**/ ethnic_tensionave ethnicave 				///
		 europe execleftave execrightave fdiave foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ energyuseave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_8 /**/, tstat pval ci autoid append detail(all) 	
						}	
						
						
 ***************
 ** 9. ethnic_tensionave **
 ***************
		
		oprobit dest_UNODC /**/ ethnic_tensionave /**/
		regsave using /**/ eba_unodc_9 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave /**/  ethnicave 				    ///
		 europe execleftave execrightave fdiave foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ ethnic_tensionave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_9 /**/, tstat pval ci autoid append detail(all) 	
						}	
						
	 				
 ***************
 ** 10. ethnicave **
 ***************
		
		oprobit dest_UNODC /**/ ethnicave /**/
		regsave using /**/ eba_unodc_10 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave /**/   		///
		 europe execleftave execrightave fdiave foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ ethnicave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_10 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
						
	 				
 ***************
 ** 11. europe **
 ***************
		
		oprobit dest_UNODC /**/ europe /**/
		regsave using /**/ eba_unodc_11 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 /**/  execleftave execrightave fdiave foodave 						///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ europe /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_11 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
									
 ***************
 ** 12. execleftave **
 ***************
		
		oprobit dest_UNODC /**/ execleftave /**/
		regsave using /**/ eba_unodc_12 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe /**/   execrightave fdiave foodave 						    ///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ execleftave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_12 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 13. execrightave **
 ***************
		
		oprobit dest_UNODC /**/ execrightave /**/
		regsave using /**/ eba_unodc_13 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave /**/   fdiave foodave 						    ///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ execrightave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_13 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 14. fdiave **
 ***************
		
		oprobit dest_UNODC /**/ fdiave /**/
		regsave using /**/ eba_unodc_14 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave /**/    foodave 					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ fdiave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_14 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 15. foodave **
 ***************
		
		oprobit dest_UNODC /**/ foodave /**/
		regsave using /**/ eba_unodc_15 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave /**/     					///
		 homicidesave infantave KOFSoGIave languageave legal_britishave 	///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ foodave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_15 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 16. homicidesave **
 ***************
		
		oprobit dest_UNODC /**/ homicidesave /**/
		regsave using /**/ eba_unodc_16 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		/// 1-5
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	/// 6-10
		 europe execleftave execrightave fdiave foodave      				/// 11-15
		/**/  infantave KOFSoGIave languageave legal_britishave 			/// 16-19
		 legal_frenchave legal_germanave legal_scanave literacyave 			/// 20-23
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			/// 24-28
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	/// 29-33
		 polity2ave popave preventave prostlawave protectave 				/// 34-38
		 pveave refugeesave religionave rleave sasia 						/// 39-43
		 ssa tourismave tradeave unemploymentave urbanave 					/// 44-48
		 vaeave visaave weconave wosocave english 							/// 49-53
		 french german spanish portuguese landlocked 						///	 54-58
				, max(3) min(3)  kronecker cond(!(21&51&58))
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ homicidesave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_16 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 17. infantave **
 ***************
		
		oprobit dest_UNODC /**/ infantave /**/
		regsave using /**/ eba_unodc_17 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave /**/   KOFSoGIave languageave legal_britishave 		///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ infantave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_17 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
												
 ***************
 ** 18. KOFSoGIave **
 ***************
		
		oprobit dest_UNODC /**/ KOFSoGIave /**/
		regsave using /**/ eba_unodc_18 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave /**/    languageave legal_britishave 		///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ KOFSoGIave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_18 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
									
 ***************
 ** 19. languageave **
 ***************
		
		oprobit dest_UNODC /**/ languageave /**/
		regsave using /**/ eba_unodc_19 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave /**/     legal_britishave 		///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ languageave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_19 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
									
 ***************
 ** 20. legal_britishave **
 ***************
		
		oprobit dest_UNODC /**/ legal_britishave /**/
		regsave using /**/ eba_unodc_20 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave /**/         		///
		 legal_frenchave legal_germanave legal_scanave literacyave 			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ legal_britishave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_20 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
									
																															
 ***************
 ** 21. legal_frenchave **
 ***************
		
		oprobit dest_UNODC /**/ legal_frenchave /**/
		regsave using /**/ eba_unodc_21 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		/// 1-5
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	/// 6-10 
		 europe execleftave execrightave fdiave foodave      				/// 11-15
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	/// 16-20
		 /**/  legal_germanave legal_scanave literacyave 					/// 21-23
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			/// 24-28
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	/// 29-33
		 polity2ave popave preventave prostlawave protectave 				/// 34-38
		 pveave refugeesave religionave rleave sasia 						/// 39-43
		 ssa tourismave tradeave unemploymentave urbanave 					/// 44-48
		 vaeave visaave weconave wosocave english 							/// 49-53
		 french german spanish portuguese landlocked 						///	54-58
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ legal_frenchave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_21 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
									
																																																			
 ***************
 ** 22. legal_germanave **
 ***************
		
		oprobit dest_UNODC /**/ legal_germanave  /**/
		regsave using /**/ eba_unodc_22 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave /**/   legal_scanave literacyave 					///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker  cond(!(16&51) !(16&58) !(51&58))
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ legal_germanave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_22 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																			
 ***************
 ** 23. legal_scanave **
 ***************
		
		oprobit dest_UNODC /**/ legal_scanave  /**/
		regsave using /**/ eba_unodc_23 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave /**/    literacyave 				///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ legal_scanave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_23 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																			
 ***************
 ** 24. literacyave **
 ***************
		
		oprobit dest_UNODC /**/ literacyave  /**/
		regsave using /**/ eba_unodc_24 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave /**/     			///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ literacyave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_24 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																												
 ***************
 ** 25. lp_catho80ave **
 ***************
		
		oprobit dest_UNODC /**/ lp_catho80ave  /**/
		regsave using /**/ eba_unodc_25 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 /**/  lp_protmg80ave mediaave mena migrationave 					///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ lp_catho80ave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_25 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																												
 ***************
 ** 26. lp_protmg80ave **
 ***************
		
		oprobit dest_UNODC /**/ lp_protmg80ave  /**/
		regsave using /**/ eba_unodc_26 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 lp_catho80ave /**/   mediaave mena migrationave 					///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ lp_protmg80ave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_26 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																		 ***************
 ** 27. mediaave **
 ***************
		
		oprobit dest_UNODC /**/ mediaave  /**/
		regsave using /**/ eba_unodc_27 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 lp_catho80ave lp_protmg80ave /**/    mena migrationave 			///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ mediaave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_27 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																												
***************
 ** 28. mena **
 ***************
		
		oprobit dest_UNODC /**/ mena  /**/
		regsave using /**/ eba_unodc_28 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 lp_catho80ave lp_protmg80ave mediaave /**/     migrationave 		///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ mena /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_28 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																		***************
 ** 29. migrationave **
 ***************
		
		oprobit dest_UNODC /**/ migrationave  /**/
		regsave using /**/ eba_unodc_29 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 lp_catho80ave lp_protmg80ave mediaave mena /**/      				///
		 mortality5ave muslimave oecd peacekeepersflave peacekeeperslave 	///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ migrationave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_29 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
																																												
																						***************
 ** 30. mortality5ave **
 ***************
		
		oprobit dest_UNODC /**/ mortality5ave  /**/
		regsave using /**/ eba_unodc_30 /**/, replace
		
		tuples 																///
		  agrave america_l america_n conflict_extave conflict_intave 		///
		 cpiave easia_pacific energyuseave ethnic_tensionave ethnicave  	///
		 europe execleftave execrightave fdiave foodave      				///
		 homicidesave infantave KOFSoGIave languageave legal_britishave    	///
		 legal_frenchave legal_germanave legal_scanave literacyave      	///
		 lp_catho80ave lp_protmg80ave mediaave mena migrationave   			///
		 /**/  muslimave oecd peacekeepersflave peacekeeperslave 			///
		 polity2ave popave preventave prostlawave protectave 				///
		 pveave refugeesave religionave rleave sasia 						///
		 ssa tourismave tradeave unemploymentave urbanave 					///
		 vaeave visaave weconave wosocave english 							///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 oprobit dest_UNODC /**/ mortality5ave /**/ `tuple`i'' gdpave 
		regsave using /**/ eba_unodc_30 /**/, tstat pval ci autoid append detail(all) 	
						}							 					
 
						
						
						
						
	
